home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2001 April / april_2001.iso / intercd / root / Browsers / ^bu_Communicator / Mirc / setup.exe / SPD / SPD.INI < prev    next >
Encoding:
INI File  |  2001-02-07  |  27.4 KB  |  510 lines

  1. [script]
  2. n0=; ===[ This script was coded by sPD aka avi hirsh, please credit me for what you rip.. SPD@HOTMAIL.CO.IL :]===
  3. n1=
  4. n2=alias sPDeng {
  5. n3=  unset %spdeng
  6. n4=  set %spdeng $1
  7. n5=  set %spdeng $upper(%spdeng)
  8. n6=  set %spdeng $replace(%spdeng,.,/)
  9. n7=  return %spdeng
  10. n8=}
  11. n9=
  12. n10=alias spdip {
  13. n11=  unset %spdip
  14. n12=  set %spdip $1
  15. n13=  set %spdip $replace(%spdip,.,/)
  16. n14=  return %spdip
  17. n15=}
  18. n16=
  19. n17=alias makeSPD { /getSPD |  set %spd.mk.temp $active | /editbox %spd.mk.temp | unset %spd.mk.temp }
  20. n18=alias getSPD {
  21. n19=  unset %SPDvar1
  22. n20=  unset %SPDvar2
  23. n21=  unset %SPDvar3 
  24. n22=  unset %SPDvar4
  25. n23=  unset %SPDvar5
  26. n24=  unset %SPDvar6
  27. n25=  unset %SPDvar7
  28. n26=  unset %SPDvar8
  29. n27=  unset %SPDvar9
  30. n28=  set %temp_get $sline($active,1).ln
  31. n29=  if (%temp_get == $null) editbox $active
  32. n30=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  33. n31=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  34. n32=    %SPDvar1 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  35. n33=    %isP = yes 
  36. n34=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar1))  
  37. n35=  }
  38. n36=  set %temp_get $sline($active,2).ln
  39. n37=  if (%temp_get == $null) editbox $active 
  40. n38=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  41. n39=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  42. n40=    %SPDvar2 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  43. n41=    %isP = yes 
  44. n42=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar2))  
  45. n43=  }
  46. n44=  set %temp_get $sline($active,3).ln
  47. n45=  if (%temp_get == $null) editbox $active 
  48. n46=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  49. n47=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  50. n48=    %SPDvar3 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  51. n49=    %isP = yes 
  52. n50=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar3))  
  53. n51=  }
  54. n52=  set %temp_get $sline($active,4).ln
  55. n53=  if (%temp_get == $null) editbox $active 
  56. n54=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  57. n55=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  58. n56=    %SPDvar4 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  59. n57=    %isP = yes 
  60. n58=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar4))  
  61. n59=  }
  62. n60=  set %temp_get $sline($active,5).ln
  63. n61=  if (%temp_get == $null) editbox $active 
  64. n62=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  65. n63=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  66. n64=    %SPDvar5 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  67. n65=    %isP = yes 
  68. n66=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar5))  
  69. n67=  }
  70. n68=  set %temp_get $sline($active,6).ln
  71. n69=  if (%temp_get == $null) editbox $active 
  72. n70=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  73. n71=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  74. n72=    %SPDvar6 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  75. n73=    %isP = yes 
  76. n74=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar6))  
  77. n75=  }
  78. n76=  set %temp_get $sline($active,7).ln
  79. n77=  if (%temp_get == $null) editbox $active 
  80. n78=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  81. n79=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  82. n80=    %SPDvar7 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  83. n81=    %isP = yes 
  84. n82=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar7))  
  85. n83=  }
  86. n84=  set %temp_get $sline($active,8).ln
  87. n85=  if (%temp_get == $null) editbox $active 
  88. n86=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  89. n87=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  90. n88=    %SPDvar8 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  91. n89=    %isP = yes 
  92. n90=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar8))  
  93. n91=  }
  94. n92=  set %temp_get $sline($active,9).ln
  95. n93=  if (%temp_get == $null) editbox $active 
  96. n94=  else {    %_NickPos = $pos($line($active,%temp_get,1),.,1) + 2
  97. n95=    %_NickLen = $mid($line($active,%temp_get,1),%_NickPos,0)
  98. n96=    %SPDvar9 = $mid($line($active,%temp_get,1),%_NickPos,%_NickLen))
  99. n97=    %isP = yes 
  100. n98=    editbox  -p $active \⌠°ΦΘ: $putname($wallaHebToEng(%SPDvar9))  
  101. n99=  }
  102. n100=  unset %temp_get
  103. n101=}
  104. n102=
  105. n103=alias spd.dns.go {
  106. n104=  if (%spd.dns.active == TRUE) { set %spd.tempo *** Σ·≡Γ∙σ· ß≈∙σ· SND α≡α τδΣ ∙Σß≈∙Σ Σ≈σπε· ·±·ΘΘφ | spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo | halt }
  107. n105=
  108. n106=  set %spd.dns.active TRUE
  109. n107=  /dns $1
  110. n108=
  111. n109=}
  112. n110=
  113. n111=on 1:DNS:{ 
  114. n112=
  115. n113=  if (%spd.dns.loop == $null) { set %spd.dns.loop 0 }
  116. n114=  else { inc %spd.dns.loop }
  117. n115=  if (%spd.dns.ip == $iaddress) && (%spd.dns.loop > 2) { set %temp.check 1 | dec %spd.dns.loop }
  118. n116=  if ( ·ß isin %spd.dns.ip) { set %temp.check 1 | inc %spd.dns.loop }
  119. n117=
  120. n118=  if ( $naddress == $null ) { set %temp.addr $wallareversed(αΘ α⌠∙° ∞Σ⌠σΩ δ·σß· ) }
  121. n119=  else { set %temp.addr $naddress }
  122. n120=  if ( $iaddress == $null ) { set %temp.ip $wallareversed(αΘ α⌠∙° ∞Σ⌠σΩ δ·σß· ) }
  123. n121=  else { set %temp.ip $iaddress }
  124. n122=
  125. n123=  if (%temp.check == 1) {
  126. n124=    if (%spd.dns.nick != $null) { set %spd.tempo *** τΘ⌠σ∙ Σσ⌠≥∞ ≥∞ $wallaname(%spd.dns.nick) | spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
  127. n125=    set %spd.tempo *** δ·σß· ßε±⌠°Θφ: $wallareversed($spdip(%temp.ip))
  128. n126=    spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo))
  129. n127=    unset %spd.tempo
  130. n128=    if ( ·ß isin %spd.dns.ip) { set %spd.tempo *** δ·σß· ßεΘ∞Θφ: $wallareversed($spdeng(%spd.dns.addr)) | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
  131. n129=    else { set %spd.tempo *** δ·σß· ßεΘ∞Θφ: $wallareversed($spdeng(%temp.addr)) | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
  132. n130=    if ($iaddress != $null) { set %spd.tempo *** δ·σß· α°σδΣ: $wallareversed($longip($iaddress)) | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo } 
  133. n131=    else { set %spd.tempo *** δ·σß· α°σδΣ: αΘ α⌠∙° ∞Σ⌠σΩ δ·σß· | spdSHOWALL 0 13 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
  134. n132=    set %spd.tempo *** τΘ⌠σ∙ Σσ∙∞φ ∞ατ° %spd.dns.loop ≈⌠Θ÷σ·
  135. n133=    spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo))
  136. n134=    unset %spd.tempo 
  137. n135=  }
  138. n136=
  139. n137=  set %spd.dns.ip %temp.ip
  140. n138=  set %spd.dns.addr %temp.addr
  141. n139=  unset %temp.ip
  142. n140=  unset %temp.addr
  143. n141=  if (%temp.check != 1) { /dns %spd.dns.ip }
  144. n142=  else { unset %spd.dns.loop | unset %spd.dns.ip | unset %spd.dns.addr | unset %spd.dns.active | unset %spd.dns.nick }
  145. n143=  unset %temp.check
  146. n144=
  147. n145=}
  148. n146=
  149. n147=on *:VOICE:#: {
  150. n148=  if ($vnick !isop $chan(#)) {
  151. n149=    wallareplace $vnick $vnick $spdwin
  152. n150=    if ($nick == $server) { %temp.nick = var, }
  153. n151=    else { %temp.nick = $nick }
  154. n152=    set %spd.tempo *** $wallaname($vnick) ehck +V n $+ $wallaname(%temp.nick)
  155. n153=    if ($vnick == $me) && (%spd.display.sound == ON) { 
  156. n154=      %t = $rand(1,10)
  157. n155=      if (%t > 5) { .splay sound\voice.wav }
  158. n156=      else { .splay sound\voice2.wav }
  159. n157=      unset %t
  160. n158=    }
  161. n159=    spdecho %spd.color.action $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
  162. n160=    unset %spd.tempo
  163. n161=    unset %temp.nick
  164. n162=  }
  165. n163=}
  166. n164=
  167. n165=on *:DEVOICE:#:{ 
  168. n166=  if ($vnick !isop $chan(#)) {
  169. n167=    wallareplace $vnick $vnick $spdwin
  170. n168=    if ($nick == $server) { %temp.nick = var, }
  171. n169=    else { %temp.nick = $nick }
  172. n170=    set %spd.tempo *** $wallaname(%temp.nick) vxhr +V n $+ $wallaname($vnick)
  173. n171=    if ($vnick == $me) && (%spd.display.sound == ON) { .splay sound\damn.wav }
  174. n172=    spdecho %spd.color.action $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
  175. n173=    %unset %spd.tempo
  176. n174=    unset %temp.nick
  177. n175=  }
  178. n176=}
  179. n177=
  180. n178=alias spd.mass.all {
  181. n179=  set %chan $chan($mid($active,9,50))
  182. n180=  set %counter 1
  183. n181=  set %spd.mass.msg $1-
  184. n182=  :allloop
  185. n183=  .msg $nick(%chan,%counter) $wallahebtoeng(%spd.mass.msg)
  186. n184=  inc %counter
  187. n185=  if ($nick(%chan,%counter) != $null) { goto allloop }
  188. n186=  unset %spd.mass.msg
  189. n187=  ; dec %counter
  190. n188=  .spdecho 6 $mid($active,9,50) . %counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  191. n189=  unset %counter
  192. n190=  unset %chan
  193. n191=}
  194. n192=
  195. n193=alias spd.mass.ops {
  196. n194=  set %chan $chan($mid($active,9,50))
  197. n195=  set %counter 1
  198. n196=  set %spd.mass.msg $1-
  199. n197=  set %spd.mass.msg.counter 0
  200. n198=  :allloop
  201. n199=  if ($nick(%chan,%counter) isop %chan) { .msg $nick(%chan,%counter) $wallahebtoeng(%spd.mass.msg) | inc %spd.mass.ops.counter }
  202. n200=  inc %counter
  203. n201=  if ($nick(%chan,%counter) != $null) { goto allloop }
  204. n202=  unset %spd.mass.msg
  205. n203=  dec %counter
  206. n204=  spdecho 6 $mid($active,9,50) . %spd.mass.ops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  207. n205=  unset %counter
  208. n206=  unset %chan
  209. n207=  unset %spd.mass.ops.counter
  210. n208=}
  211. n209=
  212. n210=alias spd.mass.notops {
  213. n211=  set %chan $chan($mid($active,9,50))
  214. n212=  set %counter 1
  215. n213=  set %spd.mass.msg $1-
  216. n214=  set %spd.mass.notops.counter 0
  217. n215=  :allloop
  218. n216=  if ($nick(%chan,%counter) !isop %chan) { .msg $nick(%chan,%counter) $wallahebtoeng(%spd.mass.msg) | inc %spd.mass.notops.counter }
  219. n217=  inc %counter
  220. n218=  if ($nick(%chan,%counter) != $null) { goto allloop }
  221. n219=  unset %spd.mass.msg
  222. n220=  ; dec %counter
  223. n221=  .spdecho 6 $mid($active,9,50) . %spd.mass.notops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  224. n222=  unset %counter
  225. n223=  unset %chan
  226. n224=  unset %spd.mass.notops.counter
  227. n225=}
  228. n226=
  229. n227=alias spd.notice.mass.all {
  230. n228=  set %chan $chan($mid($active,9,50))
  231. n229=  set %counter 1
  232. n230=  set %spd.mass.msg $wallahebtoeng($1-)
  233. n231=  :allloop
  234. n232=  .notice $nick(%chan,%counter) %spd.mass.msg
  235. n233=  inc %counter
  236. n234=  if ($nick(%chan,%counter) != $null) { goto allloop }
  237. n235=  unset %spd.mass.msg
  238. n236=  ; dec %counter
  239. n237=  .spdecho 6 $mid($active,9,50) . %counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  240. n238=  unset %counter
  241. n239=  unset %chan
  242. n240=}
  243. n241=
  244. n242=alias spd.notice.mass.ops {
  245. n243=  set %chan $chan($mid($active,9,50))
  246. n244=  set %counter 1
  247. n245=  set %spd.mass.msg $wallahebtoeng($1-)
  248. n246=  set %spd.mass.msg.counter 0
  249. n247=  :allloop
  250. n248=  if ($nick(%chan,%counter) isop %chan) { .notice $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.ops.counter }
  251. n249=  inc %counter
  252. n250=  if ($nick(%chan,%counter) != $null) { goto allloop }
  253. n251=  unset %spd.mass.msg
  254. n252=  dec %counter
  255. n253=  .spdecho 6 $mid($active,9,50) . %spd.mass.ops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  256. n254=  unset %counter
  257. n255=  unset %chan
  258. n256=  unset %spd.mass.ops.counter
  259. n257=}
  260. n258=
  261. n259=alias spd.notice.mass.notops {
  262. n260=  set %chan $chan($mid($active,9,50))
  263. n261=  set %counter 1
  264. n262=  set %spd.mass.msg $wallahebtoeng($1-)
  265. n263=  set %spd.mass.notops.counter 0
  266. n264=  :allloop
  267. n265=  if ($nick(%chan,%counter) !isop %chan) { .notice $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.notops.counter }
  268. n266=  inc %counter
  269. n267=  if ($nick(%chan,%counter) != $null) { goto allloop }
  270. n268=  unset %spd.mass.msg
  271. n269=  ; dec %counter
  272. n270=  .spdecho 6 $mid($active,9,50) . %spd.mass.notops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  273. n271=  unset %counter
  274. n272=  unset %chan
  275. n273=  unset %spd.mass.notops.counter
  276. n274=}
  277. n275=
  278. n276=alias spd.ctcp.mass.all {
  279. n277=  set %chan $chan($mid($active,9,50))
  280. n278=  set %counter 1
  281. n279=  set %spd.mass.msg $wallahebtoeng($1-)
  282. n280=  :allloop
  283. n281=  .ctcp $nick(%chan,%counter) %spd.mass.msg
  284. n282=  inc %counter
  285. n283=  if ($nick(%chan,%counter) != $null) { goto allloop }
  286. n284=  unset %spd.mass.msg
  287. n285=  ; dec %counter
  288. n286=  .spdecho 6 $mid($active,9,50) . %counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  289. n287=  unset %counter
  290. n288=  unset %chan
  291. n289=}
  292. n290=
  293. n291=alias spd.ctcp.mass.ops {
  294. n292=  set %chan $chan($mid($active,9,50))
  295. n293=  set %counter 1
  296. n294=  set %spd.mass.msg $wallahebtoeng($1-)
  297. n295=  set %spd.mass.msg.counter 0
  298. n296=  :allloop
  299. n297=  if ($nick(%chan,%counter) isop %chan) { .ctcp $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.ops.counter }
  300. n298=  inc %counter
  301. n299=  if ($nick(%chan,%counter) != $null) { goto allloop }
  302. n300=  unset %spd.mass.msg
  303. n301=  dec %counter
  304. n302=  .spdecho 6 $mid($active,9,50) . %spd.mass.ops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  305. n303=  unset %counter
  306. n304=  unset %chan
  307. n305=  unset %spd.mass.ops.counter
  308. n306=}
  309. n307=
  310. n308=alias spd.ctcp.mass.notops {
  311. n309=  set %chan $chan($mid($active,9,50))
  312. n310=  set %counter 1
  313. n311=  set %spd.mass.msg $wallahebtoeng($1-)
  314. n312=  set %spd.mass.notops.counter 0
  315. n313=  :allloop
  316. n314=  if ($nick(%chan,%counter) !isop %chan) { .ctcp $nick(%chan,%counter) %spd.mass.msg | inc %spd.mass.notops.counter }
  317. n315=  inc %counter
  318. n316=  if ($nick(%chan,%counter) != $null) { goto allloop }
  319. n317=  unset %spd.mass.msg
  320. n318=  ; dec %counter
  321. n319=  .spdecho 6 $mid($active,9,50) . %spd.mass.notops.counter :α≡∙Θφ ∙≈Θß∞σ α· ΣΣσπ≥Σ ***
  322. n320=  unset %counter
  323. n321=  unset %chan
  324. n322=  unset %spd.mass.notops.counter
  325. n323=}
  326. n324=
  327. n325=alias f2 {
  328. n326=  if ($server) { set %spd.tempo fcr njucr kar, | spdSHOWALL 0 4 $wallahebrew($len(%spd.tempo),$wallareversed(%spd.tempo)) | unset %spd.tempo }
  329. n327=  else { set %spd.tempo ε≡±Σ ∞Σ·τß° ∞ $+ MF99UB | spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo | /server 192.115.207.224 4470 }
  330. n328=}
  331. n329=alias f3 { run notepad spd\personal.spd }
  332. n330=
  333. n331=on *:TEXT:*:?:{
  334. n332=  if (%away != on) && (%away != off) { set %away off }
  335. n333=  if (%away == $null ) { set %away off }
  336. n334=
  337. n335=  if (%away == on) {
  338. n336=    if (%awaymsg == $null) { set %awaymsg nhs tjzur// }
  339. n337=    if (%awaymsg != $null) { .msg $nick $wallahebtoeng($replace(%awaymsg,.,/)) }
  340. n338=  }
  341. n339=
  342. n340=  if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
  343. n341=  if (%spd.flood.msg == NORMAL) {
  344. n342=    if ([ %spd.msg. [ $+ [ $nick ] ] ] == $null) { /set %spd.msg. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.msg. [ $+ [ $nick ] ] }
  345. n343=    if ([ %spd.msg. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  346. n344=    if ([ %spd.msg. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.msg. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  347. n345=  }
  348. n346=
  349. n347=  if (%spd.flood.msg == HIGH) {
  350. n348=    if ([ %spd.msg. [ $+ [ $site ] ] ] == $null) { /set %spd.msg. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.msg. [ $+ [ $site ] ] }
  351. n349=    if ([ %spd.msg. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  352. n350=    if ([ %spd.msg. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.msg. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  353. n351=  }
  354. n352=
  355. n353=  if (%spd.flood.msg == NORMAL)  { inc %spd.msg. [ $+ [ $nick ] ] 1 }
  356. n354=  if (%spd.flood.msg == HIGH)  { inc %spd.msg. [ $+ [ $site ] ] 1 }
  357. n355=}
  358. n356=
  359. n357=on *:CHAT:*: {
  360. n358=  if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
  361. n359=  if (%spd.flood.dcc == NORMAL) {
  362. n360=    if ([ %spd.dcc. [ $+ [ $nick ] ] ] == $null) { /set %spd.dcc. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.dcc. [ $+ [ $nick ] ] }
  363. n361=    if ([ %spd.dcc. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  364. n362=    if ([ %spd.dcc. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | close -c $nick | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.dcc. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  365. n363=  }
  366. n364=
  367. n365=  if (%spd.flood.dcc == HIGH) {
  368. n366=    if ([ %spd.dcc. [ $+ [ $site ] ] ] == $null) { /set %spd.dcc. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.dcc. [ $+ [ $site ] ] }
  369. n367=    if ([ %spd.dcc. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  370. n368=    if ([ %spd.dcc. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | close -c $nick | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.dcc. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  371. n369=  }
  372. n370=
  373. n371=  if (%spd.flood.dcc == NORMAL)  { inc %spd.dcc. [ $+ [ $nick ] ] 1 }
  374. n372=  if (%spd.flood.dcc == HIGH)  { inc %spd.dcc. [ $+ [ $site ] ] 1 }
  375. n373=}
  376. n374=
  377. n375=on 1:NOTICE:*:*: {
  378. n376=  if (%spd.visible.notice == ON) { spdSHOWON 0 %spd.color.notice $nick $nick *Σ·°≥Σ* - $+ $wallaname($nick) $+ - $1- }
  379. n377=
  380. n378=  if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
  381. n379=  if (%spd.flood.notice == NORMAL) {
  382. n380=    if ([ %spd.notice. [ $+ [ $nick ] ] ] == $null) { /set %spd.notice. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.notice. [ $+ [ $nick ] ] }
  383. n381=    if ([ %spd.notice. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  384. n382=    if ([ %spd.notice. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.notice. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  385. n383=  }
  386. n384=
  387. n385=  if (%spd.flood.notice == HIGH) {
  388. n386=    if ([ %spd.notice. [ $+ [ $site ] ] ] == $null) { /set %spd.notice. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.notice. [ $+ [ $site ] ] }
  389. n387=    if ([ %spd.notice. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  390. n388=    if ([ %spd.notice. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.notice. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  391. n389=  }
  392. n390=
  393. n391=  if (%spd.flood.notice == NORMAL)  { inc %spd.notice. [ $+ [ $nick ] ] 1 }
  394. n392=  if (%spd.flood.notice == HIGH)  { inc %spd.notice. [ $+ [ $site ] ] 1 }
  395. n393=}
  396. n394=
  397. n395=on 1:ACTION:*:*: {
  398. n396=  if (%spd.visible.action == ON) { spdSHOWON 0 11 $nick $nick * $wallaname($nick) $replace($1-,q,·) }
  399. n397=
  400. n398=  if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
  401. n399=  if (%spd.flood.action == NORMAL) {
  402. n400=    if ([ %spd.action. [ $+ [ $nick ] ] ] == $null) { /set %spd.action. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.action. [ $+ [ $nick ] ] }
  403. n401=    if ([ %spd.action. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  404. n402=    if ([ %spd.action. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.action. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  405. n403=  }
  406. n404=
  407. n405=  if (%spd.flood.action == HIGH) {
  408. n406=    if ([ %spd.action. [ $+ [ $site ] ] ] == $null) { /set %spd.action. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.action. [ $+ [ $site ] ] }
  409. n407=    if ([ %spd.action. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  410. n408=    if ([ %spd.action. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore /60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.action. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  411. n409=  }
  412. n410=
  413. n411=  if (%spd.flood.action == NORMAL)  { inc %spd.action. [ $+ [ $nick ] ] 1 }
  414. n412=  if (%spd.flood.action == HIGH)  { inc %spd.action. [ $+ [ $site ] ] 1 }
  415. n413=}
  416. n414=
  417. n415=ctcp *:*:*: {
  418. n416=  if ($1 == VERSION) || ($1 == DCC) || ($1 == FINGER) || ($1 == TIME) || ($1 == PING) {
  419. n417=    if (%spd.visible.ctcp == ON) { spdSHOWON 0 %spd.color.ctcp $nick $nick *⌠Θ≡Γ* ] $+ $wallaname($nick) $+ [ $wallareversed($spdip($upper($1-))) }
  420. n418=  }
  421. n419=  else { if (%spd.visible.ctcp == ON) { spdSHOWON 0 %spd.color.ctcp $nick $nick *⌠Θ≡Γ* ] $+ $wallaname($nick) $+ [ $1- } }
  422. n420=
  423. n421=  if (%spd.flood.ignore == $null) { set %spd.flood.ignore 30 }
  424. n422=  if (%spd.flood.ctcp == NORMAL) {
  425. n423=    if ([ %spd.ctcp. [ $+ [ $nick ] ] ] == $null) { /set %spd.ctcp. [ $+ [ $nick ] ] 0 | .timer 1 8 /unset %spd.ctcp. [ $+ [ $nick ] ] }
  426. n424=    if ([ %spd.ctcp. [ $+ [ $nick ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  427. n425=    if ([ %spd.ctcp. [ $+ [ $nick ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore /60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 1 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.ctcp. [ $+ [ $nick ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  428. n426=  }
  429. n427=
  430. n428=  if (%spd.flood.ctcp == HIGH) {
  431. n429=    if ([ %spd.ctcp. [ $+ [ $site ] ] ] == $null) { /set %spd.ctcp. [ $+ [ $site ] ] 0 | .timer 1 8 /unset %spd.ctcp. [ $+ [ $site ] ] }
  432. n430=    if ([ %spd.ctcp. [ $+ [ $site ] ] ] == 5) { .msg $nick ,thy t, vemc! tk ,athr\h kh vusgu, cnal 01 abhu,! } 
  433. n431=    if ([ %spd.ctcp. [ $+ [ $site ] ] ] == 7) { .msg $nick vhh! vzvr,h tu,l -- $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu, v,gknu,! | .ignore -nptu $+ %spd.flood.ignore $nick 2 | spdSHOWALL 0 4 *** $wallaname($nick) nmh; cpryh -- n,gko k- $+ $spdip($wallareversed( [ $calc(%spd.flood.ignore / 60) ] )) seu,! | unset %spd.ctcp. [ $+ [ $site ] ] | if (%spd.display.sound == ON) && (%io == on) { .splay sound\monster.wav } | halt }
  434. n432=  }
  435. n433=
  436. n434=  if (%spd.flood.ctcp == NORMAL)  { inc %spd.ctcp. [ $+ [ $nick ] ] 1 }
  437. n435=  if (%spd.flood.ctcp == HIGH)  { inc %spd.ctcp. [ $+ [ $site ] ] 1 }
  438. n436=}
  439. n437=
  440. n438=
  441. n439=on *:ctcpreply:*: {
  442. n440=  if (%spd.visible.ctcp == ON) { spdSHOWON 0 %spd.color.ctcp $nick $nick *·∙σß· ⌠Θ≡Γ* ] $+ $wallaname($nick) $+ [ $wallareversed($spdip($upper($2-))) }
  443. n441=}
  444. n442=
  445. n443=on *:MODE:*: { 
  446. n444=  if (%spd.display.mode == ON) && (%io == on) { 
  447. n445=    set %spd.tempo *** $nick ecg\v cgru. $wallareversed($upper($1-))
  448. n446=    /spdecho %spd.color.mode $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo) 
  449. n447=    unset %spd.tempo 
  450. n448=  } 
  451. n449=}
  452. n450=
  453. n451=on *:SERVERMODE:*: { 
  454. n452=  if (%spd.display.mode == ON) && (%io == on) { 
  455. n453=    set %spd.tempo *** var, ecg\v cgru. $wallareversed($upper($1-))
  456. n454=    /spdecho %spd.color.mode $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo) 
  457. n455=    unset %spd.tempo 
  458. n456=  } 
  459. n457=}
  460. n458=
  461. n459=on *:TOPIC:*: { set %spd.tempo *** $nick nabv t, vfu,r,: $wallahebtoeng($upper($1-)) | /spdecho 4 $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  462. n460=on *:IGNORE:*: { set %spd.tempo *** $nick v,gknu, $wallareversed($upper($1-)) | /spdecho 4 $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  463. n461=
  464. n462=on *:BAN:#: {
  465. n463=  if ($nick == $server) { %temp.nick = var, }
  466. n464=  else { %temp.nick = $nick }
  467. n465=  set %spd.tempo *** $wallareversed($spdeng($banmask)) vux; krahn, vctbho gk hsh $wallaname(%temp.nick)
  468. n466=  if (%spd.display.ban == ON ) && (%io == on) spdecho %spd.color.ban $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
  469. n467=  unset %spd.tempo
  470. n468=  unset %temp.nick
  471. n469=}
  472. n470=
  473. n471=on *:UNBAN:#: {
  474. n472=  if ($nick == $server) { %temp.nick = var, }
  475. n473=  else { %temp.nick = $nick }
  476. n474=  set %spd.tempo *** $wallareversed($spdeng($banmask)) vurs nrahn, vctbho gk hsh $wallaname(%temp.nick)
  477. n475=  if (%spd.display.ban == ON ) && (%io == on) spdecho %spd.color.ban $spdwin $wallahebrew($len(%spd.tempo),%spd.tempo)
  478. n476=  unset %spd.tempo
  479. n477=  unset %temp.nick
  480. n478=}
  481. n479=
  482. n480=alias f10 {
  483. n481=  if ($server) { /pass $$?="Σ≈∙ ±Θ±εΣ" }
  484. n482=}
  485. n483=
  486. n484=raw 512:*: { 
  487. n485=  set %spd.tempo *** ≥∞ ∙φ µΣ Θ∙ ±Θ±εΣ - α≡α Σ≈∙ α· Σ±Θ±εΣ δπΘ ∞Σε∙ΘΩ )01F(
  488. n486=  /spdSHOWALL 0 4 %spd.tempo
  489. n487=  unset %spd.tempo
  490. n488=  /timer 1 0 f10
  491. n489=}
  492. n490=raw 510:*: { set %spd.tempo *** Σ≈∙ ±Θ±εΣ ßδπΘ ∞Σε∙ΘΩ! | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
  493. n491=raw 298:*: { set %spd.tempo *** ±Θ±εΣ ∞α ≡τσ÷Σ - ∙Θ≡σΘ ∞- $+ $wallaname($2) | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
  494. n492=raw 296:*: { set %spd.tempo *** ±Θ±εΣ Σσ≈∙Σ ßΣ÷∞τΣ ∞δΘ≡σΘ $wallaname($2) | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
  495. n493=raw 324:*: if ($mid($active,9,1) == $chr(35)) { set %spd.tempo *** ε÷ßΘφ ß≥°σ⌡: $wallareversed($upper($3)) | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  496. n494=raw 251:*: { set %spd.tempo *** Θ∙ δ°Γ≥ $wallareversed($4) ε∙·ε∙Θφ °ΓΘ∞Θφ - $wallareversed($7) ß∞·Θ ≡°αΘφ - $wallareversed($10) ∙°·Θφ | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  497. n495=raw 252:*: { set %spd.tempo *** $wallareversed($2) απεΘ≡Θφ ετσß°Θφ δ≥· | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  498. n496=raw 254:*: { set %spd.tempo *** $wallareversed($2) ≥°σ÷Θφ | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  499. n497=raw 265:*: { set %spd.tempo *** $wallareversed($5) ε∙·ε∙Θφ ≈ΘΘεΘφ - ε≈±Θεσφ $wallareversed($7) | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  500. n498=raw 391:*: { set %spd.tempo *** Σµε∩ ß∙°· Σσα $wallareversed($8) | /spdecho 4 $mid($active,9,50) $wallahebrew($len(%spd.tempo),%spd.tempo) | unset %spd.tempo }
  501. n499=raw 297:*: { set %spd.tempo *** ±Θ±εΣ ∞α ≡δσ≡Σ - ≡±Σ ∙σß ασ ∙≡Σ ∙φ! | /spdSHOWALL 0 4 %spd.tempo | unset %spd.tempo }
  502. n500=
  503. n501=raw 315:*: {
  504. n502=  if (%spd.ircop.clonescan != $null) { 
  505. n503=    ;    echo 4 @iRCOP-CONSOLe cLONE SCANNED: %spd.ircop.clonescan.count
  506. n504=    unset %spd.ircop.clonescan.count
  507. n505=    unset %spd.ircop.clonescan
  508. n506=  }
  509. n507=}
  510.